/*
 *  linux/kernel/console.c
 *
 *  (C) 1991  Linus Torvalds
 */

/*
 *	console.c
 *
 * This module implements the console io functions
 *	'void con_init(void)'
 *	'void con_write(struct tty_queue * queue)'
 * Hopefully this will be a rather complete VT102 implementation.
 *
 * Beeping thanks to John T Kohl.
 */

/*
 *  NOTE!!! We sometimes disable and enable interrupts for a short while
 * (to put a word in video IO), but this will work even for keyboard
 * interrupts. We know interrupts aren't enabled when getting a keyboard
 * interrupt, as we use trap-gates. Hopefully all is well.
 */

/*
 * Code to check for different video-cards mostly by Galen Hunt,
 * <g-hunt@ee.utah.edu>
 */

#include <linux/sched.h>
#include <linux/tty.h>
#include <asm/io.h>
#include <asm/system.h>

/*
 * These are set up by the setup-routine at boot-time:
 */

#define ORIG_X			(*(unsigned char *)0x90000)
#define ORIG_Y			(*(unsigned char *)0x90001)
#define ORIG_VIDEO_PAGE		(*(unsigned short *)0x90004)
#define ORIG_VIDEO_MODE		((*(unsigned short *)0x90006) & 0xff)
#define ORIG_VIDEO_COLS 	(((*(unsigned short *)0x90006) & 0xff00) >> 8)
#define ORIG_VIDEO_LINES	(25)
#define ORIG_VIDEO_EGA_AX	(*(unsigned short *)0x90008)
#define ORIG_VIDEO_EGA_BX	(*(unsigned short *)0x9000a)
#define ORIG_VIDEO_EGA_CX	(*(unsigned short *)0x9000c)

#define VIDEO_TYPE_MDA		0x10	/* Monochrome Text Display	*/
#define VIDEO_TYPE_CGA		0x11	/* CGA Display 			*/
#define VIDEO_TYPE_EGAM		0x20	/* EGA/VGA in Monochrome Mode	*/
#define VIDEO_TYPE_EGAC		0x21	/* EGA/VGA in Color Mode	*/

#define NPAR 16

extern void keyboard_interrupt(void);

static unsigned char	video_type;		/* Type of display being used	*/
static unsigned long	video_num_columns;	/* Number of text columns	*/
static unsigned long	video_size_row;		/* Bytes per row		*/
static unsigned long	video_num_lines;	/* Number of test lines		*/
static unsigned char	video_page;		/* Initial video page		*/
static unsigned long	video_mem_start;	/* Start of video RAM		*/
static unsigned long	video_mem_end;		/* End of video RAM (sort of)	*/
static unsigned short	video_port_reg;		/* Video register select port	*/
static unsigned short	video_port_val;		/* Video register value port	*/
static unsigned short	video_erase_char;	/* Char+Attrib to erase with	*/

static unsigned long	origin;		/* Used for EGA/VGA fast scroll	*/
static unsigned long	scr_end;	/* Used for EGA/VGA fast scroll	*/
static unsigned long	pos;
static unsigned long	x,y;
static unsigned long	top,bottom;
static unsigned long	state=0;
static unsigned long	npar,par[NPAR];
static unsigned long	ques=0;
static unsigned char	attr=0x07;

static void sysbeep(void);

/*
 * this is what the terminal answers to a ESC-Z or csi0c
 * query (= vt100 response).
 */
#define RESPONSE "\033[?1;2c"

/* NOTE! gotoxy thinks x==video_num_columns is ok */
// 设置当前的显示位置到指定的x, y
static inline void gotoxy(unsigned int new_x,unsigned int new_y)
{
	// 超边界检查
	if (new_x > video_num_columns || new_y >= video_num_lines)
		return;

	// 记录新的坐标
	x=new_x;
	y=new_y;

	// 当前的显示位置
	pos=origin + y*video_size_row + (x<<1);
}

// 设置当前显示的起始区域
static inline void set_origin(void)
{
	// origin指向了显存的起始字节
	// 其可以在显存中移动
	cli();		
	outb_p(12, video_port_reg);
	outb_p(0xff&((origin-video_mem_start)>>9), video_port_val);	// 高8位，每个字符用2个字节表示
	outb_p(13, video_port_reg);
	outb_p(0xff&((origin-video_mem_start)>>1), video_port_val);
	sti();
}

// 向上滚屏，即显示更新的内容
static void scrup(void)
{
	// 不同类型显卡，显示特性不同，所以分开处理
	if (video_type == VIDEO_TYPE_EGAC || video_type == VIDEO_TYPE_EGAM)
	{
		if (!top && bottom == video_num_lines) { // 整屏滚动
			origin += video_size_row;			// 显示的起始位置往下一行
			pos += video_size_row;				// 写字符向下一行
			scr_end += video_size_row;			// 显示末尾也向下

			// 超过了显存的末端，则不能在简单的进行调整orign这种进行滚动
			if (scr_end > video_mem_end) {
				// 超边界了，再使用显存的最开始的位置进行显示，那么这里就涉及到数据搬运过去
				__asm__ __volatile__("cld\n\t"
					"rep\n\t"
					"movsl\n\t"
					"movl video_num_columns,%1\n\t"
					"rep\n\t"
					"stosw"
					::"a" (video_erase_char),		// 第一行擦除
					"c" ((video_num_lines-1)*video_num_columns>>1), // 拷贝除第1行外的整屏幕数据
					"D" (video_mem_start),	// 到显存开始处
					"S" (origin)			// 从orgin开始处
					);
				// 调整显示的位置：全部相对于显存的开始处
				scr_end -= origin-video_mem_start;
				pos -= origin-video_mem_start;
				origin = video_mem_start;
			} else {
				// 没有显存，则在新行插入空白字符
				__asm__ __volatile__("cld\n\t"
					"rep\n\t"
					"stosw"
					::"a" (video_erase_char),
					"c" (video_num_columns),
					"D" (scr_end-video_size_row)
					);
			}

			// 更新显示位置。由于涉及到整屏区域的显示
			set_origin();
		} else {
			// 非整屏幕移动
			__asm__ __volatile__("cld\n\t"
				"rep\n\t"
				"movsl\n\t"
				"movl video_num_columns,%%ecx\n\t"
				"rep\n\t"
				"stosw"
				::"a" (video_erase_char),				// boot底部的行
				"c" ((bottom-top-1)*video_num_columns>>1),	// 只在boot和top之间进行, 不到屏幕底部
				"D" (origin+video_size_row*top),		// 往上一行拷贝
				"S" (origin+video_size_row*(top+1))		// 从top行开始
				);
		}
	}
	else		/* Not EGA/VGA */
	{
		__asm__ __volatile__("cld\n\t"
			"rep\n\t"
			"movsl\n\t"
			"movl video_num_columns,%%ecx\n\t"
			"rep\n\t"
			"stosw"
			::"a" (video_erase_char),
			"c" ((bottom-top-1)*video_num_columns>>1),
			"D" (origin+video_size_row*top),
			"S" (origin+video_size_row*(top+1))
			);
	}
}

// 往下滚动，显示以前的数据
// 看起来不支持滚屏显示以前区域的内容
static void scrdown(void)
{
	if (video_type == VIDEO_TYPE_EGAC || video_type == VIDEO_TYPE_EGAM)
	{
		__asm__ __volatile__("std\n\t"
			"rep\n\t"
			"movsl\n\t"
			"addl $2,%%edi\n\t"	/* %edi has been decremented by 4 */
			"movl video_num_columns,%%ecx\n\t"		// 4个单元的拷贝
			"rep\n\t"
			"stosw"
			::"a" (video_erase_char),						// 其余填空格
			"c" ((bottom-top-1)*video_num_columns>>1),		// 拷贝指定的区域行
			"D" (origin+video_size_row*bottom-4),			// 写到例数第1行
			"S" (origin+video_size_row*(bottom-1)-4)		// 从倒数第2行的最后一个4字单元开始
			);
	}
	else		/* Not EGA/VGA */
	{
		__asm__ __volatile__("std\n\t"
			"rep\n\t"
			"movsl\n\t"
			"addl $2,%%edi\n\t"	/* %edi has been decremented by 4 */
			"movl video_num_columns,%%ecx\n\t"
			"rep\n\t"
			"stosw"
			::"a" (video_erase_char),
			"c" ((bottom-top-1)*video_num_columns>>1),
			"D" (origin+video_size_row*bottom-4),
			"S" (origin+video_size_row*(bottom-1)-4)
			);
	}
}

// 换行
static void lf(void)
{
	// y移动下一行，如果不超过底行
	if (y+1<bottom) {
		// y++，写的位置也要增加一行
		y++;
		pos += video_size_row;
		return;
	}
	scrup();
}

// 光标往上移一行
static void ri(void)
{
	// y上移，列不动。超过顶层，则整体下移，此时y不需要动
	if (y>top) {		
		y--;
		pos -= video_size_row;
		return;
	}
	scrdown();
}

// 回车，移动第0行
static void cr(void)
{
	// 减掉行的开头，因此要减掉列数*2对应的字节数
	pos -= x<<1;
	x=0;
}

// 删除左侧字符
static void del(void)
{
	// 删除左侧字符，如果左侧没有（自己在第0行），则不删
	// 也就是说不会跑到上一行的末尾去删除字符
	if (x) {
		pos -= 2;
		x--;
		*(unsigned short *)pos = video_erase_char;
	}
}

// 显示擦除
static void csi_J(int par)
{
	long count;
	long start;

	switch (par) {
		// 从当前位置，擦除到屏幕末端
		case 0:	/* erase from cursor to end of display */
			count = (scr_end-pos)>>1;			// 计算有多少个字符
			start = pos;
			break;
		// 从显示开始，擦除到当前字符
		case 1:	/* erase from start to cursor */
			count = (pos-origin)>>1;			// 计算有多少个字符
			start = origin;
			break;
		// 擦除整个显示区域
		case 2: /* erase whole display */
			count = video_num_columns * video_num_lines;
			start = origin;
			break;
		default:
			return;
	}

	// 这里是写内存，连续写rep重复指令写
	__asm__ __volatile__("cld\n\t"
		"rep\n\t"
		"stosw\n\t"
		::"c" (count),
		"D" (start),"a" (video_erase_char)
		);
}

// 行内擦除
static void csi_K(int par)
{
	long count;
	long start;

	switch (par) {
		// 擦除光标到本行结尾
		case 0:	/* erase from cursor to end of line */
			if (x>=video_num_columns)
				return;
			count = video_num_columns-x;		// 计算有多少个字符
			start = pos;
			break;
		case 1:	/* erase from start of line to cursor */
			// 从行首到当前位置
			start = pos - (x<<1);
			count = (x<video_num_columns)?x:video_num_columns;	// 计算多少字符
			break;
		// 擦除整行
		case 2: /* erase whole line */
			start = pos - (x<<1);
			count = video_num_columns;
			break;
		default:
			return;
	}

	// 重复写入擦除字符
	__asm__ __volatile__("cld\n\t"
		"rep\n\t"
		"stosw\n\t"
		::"c" (count),
		"D" (start),"a" (video_erase_char)
		);
}

// 设置字符的属性，比如颜色等等
void csi_m(void)
{
	int i;

	// 遍历参数表
	// 看起来只支持一部分属性，没有颜色等各项设置
	for (i=0;i<=npar;i++)
		switch (par[i]) {
			case 0:attr=0x07;break;
			case 1:attr=0x0f;break;
			case 4:attr=0x0f;break;
			case 7:attr=0x70;break;
			case 27:attr=0x07;break;
		}
}

// 更新当前屏幕上的光标位置
static inline void set_cursor(void)
{
	// 将其相对于显存最开始的偏移的字符数写到相应的寄存器
	cli();
	outb_p(14, video_port_reg);
	outb_p(0xff&((pos-video_mem_start)>>9), video_port_val);		// 每个字符大小为2，所以/2
	outb_p(15, video_port_reg);
	outb_p(0xff&((pos-video_mem_start)>>1), video_port_val);
	sti();
}

static void respond(struct tty_struct * tty)
{
	// 关中断，将RESPONSE序列写入tty输入队列，指明了终端相关的属性信息
	char * p = RESPONSE;

	cli();
	while (*p) {
		PUTCH(*p,tty->read_q);
		p++;
	}
	sti();
	copy_to_cooked(tty);
}

// 插入空格字符, 右边的字符要右移
static void insert_char(void)
{
	int i=x;
	unsigned short tmp, old = video_erase_char;	// 擦除字符
	unsigned short * p = (unsigned short *) pos;

	// 1233243
	// 123 243
	// 123 343
	// 123 323
	// 123 3243
	while (i++<video_num_columns) {
		// 当前位置的字符，是下一次要写入的字符
		tmp=*p;			// 先将当前的保留起来
		*p=old;			// 在当前位置插入原来的值
		old=tmp;		// 在将old保存
		p++;
	}
}

// 在光标所在处插入新行，其原所在行以及以下的行整体往下移动
static void insert_line(void)
{
	int oldtop,oldbottom;

	oldtop=top;
	oldbottom=bottom;

	// 更新此次所使用的滚屏的起始行号, 从当前行到屏幕最低行
	top=y;
	bottom = video_num_lines;

	// 滚动, 多出来的区域要填空行
	scrdown();

	// 恢复
	top=oldtop;
	bottom=oldbottom;
}

// 删除字符
static void delete_char(void)
{
	int i;
	unsigned short * p = (unsigned short *) pos;

	// 超边界，不删
	if (x>=video_num_columns)
		return;

	// 从当前位置开始
	i = x;
	while (++i < video_num_columns) {
		*p = *(p+1);		// 右移的字符往左边移，进行覆盖
		p++;
	}

	// 最后的字符填擦除字符，应当是空格
	*p = video_erase_char;
}

// 删除行
static void delete_line(void)
{
	int oldtop,oldbottom;

	// 更新此次滚屏所用的行范围
	oldtop=top;
	oldbottom=bottom;
	top=y;
	bottom = video_num_lines;

	// 向上滚动
	scrup();
	
	top=oldtop;
	bottom=oldbottom;
}

// 在光标处插入空格
static void csi_at(unsigned int nr)
{
	// 最多插入一行
	if (nr > video_num_columns)
		nr = video_num_columns;
	else if (!nr)
		nr = 1;  // 为0时，则至少插入一个
	
	// 不断地循环插入
	while (nr--)
		insert_char();
}

// 在当前位置位置处插入多行
static void csi_L(unsigned int nr)
{
	// 不能插入超过一屏
	if (nr > video_num_lines)
		nr = video_num_lines;
	else if (!nr)
		// 如果为0，则插入一行
		nr = 1;
	while (nr--)
		// 不断插入新行
		insert_line();
}

// 删除光标处字符，右侧的会往左移
static void csi_P(unsigned int nr)
{
	// 最多一整行
	if (nr > video_num_columns)
		nr = video_num_columns;

	// 如果为0，则置1
	else if (!nr)
		nr = 1;

	// 不断地删除字符
	while (nr--)
		delete_char();
}

// 删除行
static void csi_M(unsigned int nr)
{
	// 不能删除超过整屏
	if (nr > video_num_lines)
		nr = video_num_lines;

	// 为0则至少删除一行
	else if (!nr)
		nr=1;

	// 删除所在的行，下面的行会往上滚
	while (nr--)
		delete_line();
}

static int saved_x=0;
static int saved_y=0;

// 将光标位置保存起来
static void save_cur(void)
{
	saved_x=x;
	saved_y=y;
}

// 恢复光标位置，跑到原来的地址
static void restore_cur(void)
{
	gotoxy(saved_x, saved_y);
}

void con_write(struct tty_struct * tty)
{
	int nr;
	char c;

	// 检查tty输出队列中有多少个字符
	nr = CHARS(tty->write_q);

	// 有字母，则不断取出然后输出
	while (nr--) {
		// 取出一个字符，放到c中
		GETCH(tty->write_q,c);
		switch(state) {
			case 0:				// 普通字符显示模式，如Hello,world
				if (c>31 && c<127) {
					// 可显显字符
					if (x>=video_num_columns) {
						x -= video_num_columns;
						pos -= video_size_row;			// ???
						lf();
					}

					// 下面相当于*(short *)pos = (attr << 8) | c;
					__asm__ __volatile__("movb attr,%%ah\n\t"		// attr是全局变量，保存了显示属性
						"movw %%ax,%1\n\t"				// ax保存了显示属性，字符等，写入pos指向的位置
						::"a" (c),"m" (*(short *)pos)		// 写入pos指向的位置
						);
					pos += 2;		// 显示位置也右移，2个字节
					x++;			// 光标右移
				} else if (c==27)		// ESC字符开始的序列，
					state=1;			// 转换到esc模式
				else if (c==10 || c==11 || c==12)
					lf();				// 收到LF/VT/FF，下移一行
				else if (c==13)			// \n
					cr();				// 移动到列的开头
				else if (c==ERASE_CHAR(tty))		// 收到DEL 127字符
					del();				// 删除左侧字符，最多删除到本行开头，不跑上一行删除
				else if (c==8) { 		// backspace字符
					// 只是移动光标，但不清除字符，且最多移动到本行开头
					if (x) {			
						x--;
						pos -= 2;		// 移动显示光标
					}
				} else if (c==9) {		// \t字符
					c=8-(x&7);			// 计算当前的列到数值为8的列之间的差距是多少列
					x += c;				// 将x, 和pos调整到数值为8的列上
					pos += c<<1;
					if (x>video_num_columns) {	// 超过一行，换行
						x -= video_num_columns;
						pos -= video_size_row;
						lf();
					}
					c=9;				// 重置c为\t字符, 看起来后面有用到。。。
				} else if (c==7)		// 响铃字符BEL
					sysbeep();	
				break;
			case 1:				// 收到ESC开头的序列
				state=0;
				if (c=='[')			// 收到ESC [，即有参数，CSI序列，进一步处理
					state=2;
				else if (c=='E')		// ESC [光标跑到下一行开头
					gotoxy(0,y+1);		// 这里只是设置当前显示的位置x, y，位置的更新在下面循环的末尾来控制
				else if (c=='M')		// ESC M，光标上移，y不变
					ri();
				else if (c=='D')		// ESC D，光标下移，y不变，和\n一样
					lf();
				else if (c=='Z')		// 响应主要，发送相应的报告信息
					respond(tty);
				else if (x=='7')		// 保存光标位置
					save_cur();
				else if (x=='8')		// 恢复光标位置
					restore_cur();
				break;
			case 2:			// ESC [
				for(npar=0;npar<NPAR;npar++)		// 清除所有的参数
					par[npar]=0;
				npar=0;				// 参数索引指向
				state=3;
				if ((ques=(c=='?')))		// 收到的是？则说明是设备私有序列，继续读取后续字符.否则取参数
					break;
			case 3:
				// 参数分隔符，指向下一个参数
				if (c==';' && npar<NPAR-1) {
					npar++;
					break;
				} else if (c>='0' && c<='9') {
					// 将十进制的字符序列转换成整数
					par[npar]=10*par[npar]+c-'0';
					break;
				} else state=4;		// 其它字符，继续走4的处理流程。
			case 4:
				state=0;
				switch(c) {
					case 'G': case '`':     // CSI Pn G：光标移动到当前行指定位置
						if (par[0]) par[0]--;		// 从0开始计数
						gotoxy(par[0],y);
						break;
					case 'A':				// CSI Pn A光标光移Pn行，列不变
						if (!par[0]) par[0]++;		// 如果为0，则为1
						gotoxy(x,y-par[0]);
						break;
					case 'B': case 'e':		// CSI Pn B光标下移n行，但列不变
						if (!par[0]) par[0]++;
						gotoxy(x,y+par[0]);
						break;
					case 'C': case 'a':		// CSI Pn C 光标右移n个位置。如果为0，则设置成1
						if (!par[0]) par[0]++;
						gotoxy(x+par[0],y);
						break;		
					case 'D':				// CSI Pn D光标左移n个位置
						if (!par[0]) par[0]++;
						gotoxy(x-par[0],y);
						break;
					case 'E':				// CSI Pn E 光标移动下移Pn行，并到其行首
						if (!par[0]) par[0]++;
						gotoxy(0,y+par[0]);
						break;
					case 'F':				// CSI Pn F 光标移动上移Pn行，并到其行首
						if (!par[0]) par[0]++;
						gotoxy(0,y-par[0]);
						break;
					case 'd':				// CSI Pn d光标移动到指定行，列不变
						if (par[0]) par[0]--;
						gotoxy(x,par[0]);
						break;
					case 'H': case 'f':		// CSI Pn; Pn H  光标移动指定的行和列位置
						if (par[0]) par[0]--;		// 如果非0，减1
						if (par[1]) par[1]--;
						gotoxy(par[1],par[0]);
						break;
					case 'J':				// CSI Ps J 擦除字符
						csi_J(par[0]);
						break;
					case 'K':				// CSI Ps K 行内擦除
						csi_K(par[0]);
						break;
					case 'L':				// CSI Ps L 插入行
						csi_L(par[0]);
						break;
					case 'M':				// CSI Ps M 删除行
						csi_M(par[0]);
						break;
					case 'P':				// // CSI Ps P 删除光标处字符
						csi_P(par[0]);
						break;
					case '@':				// CSI Ps @插入字符
						csi_at(par[0]);
						break;
					case 'm':				// CSI m 设备字符属性
						csi_m();
						break;
					case 'r':				// 设置卷屏上下区域 起始行和结束行
						if (par[0]) par[0]--;
						if (!par[1]) par[1] = video_num_lines;
						if (par[0] < par[1] &&
						    par[1] <= video_num_lines) {
							top=par[0];			// 在这里进行了纪录
							bottom=par[1];
						}
						break;
					case 's':				// 保存光标位置
						save_cur();
						break;
					case 'u':				// 恢复光标位置
						restore_cur();
						break;
				}
		}
	}
	set_cursor();
}

/*
 *  void con_init(void);
 *
 * This routine initalizes console interrupts, and does nothing
 * else. If you want the screen to clear, call tty_write with
 * the appropriate escape-sequece.
 *
 * Reads the information preserved by setup.s to determine the current display
 * type and sets everything accordingly.
 */
// 控制台初始化
void con_init(void)
{
	register unsigned char a;
	char *display_desc = "????";			// 显示器的类型？
	char *display_ptr;

	// 以下是获取显示器相关的一些特性信息，方便后面进行展示

	// setup中有进行了一些显示方面的测试，这里从这些地方读取信息
	video_num_columns = ORIG_VIDEO_COLS;		// 多少列
	video_size_row = video_num_columns * 2;		// 每个字符使用2个字节表，颜色+字母
	video_num_lines = ORIG_VIDEO_LINES;			// 行数
	video_page = ORIG_VIDEO_PAGE;				// 当前显示页面？
	video_erase_char = 0x0720;					// 擦除字母：字符0x20+颜色0x07
	
	// 单色显示：就是只有黑白估计
	// 以下是根据不同的显示器类型，设置显存的起始地址+端口地址等信息
	if (ORIG_VIDEO_MODE == 7)			/* Is this a monochrome display? */
	{
		// 显存地址和端口不同
		video_mem_start = 0xb0000;		// 显丰的起始地址和大小等
		video_port_reg = 0x3b4;			
		video_port_val = 0x3b5;

		// 这里进一步区分是哪种单色显示器
		if ((ORIG_VIDEO_EGA_BX & 0xff) != 0x10)
		{
			video_type = VIDEO_TYPE_EGAM;
			video_mem_end = 0xb8000;
			display_desc = "EGAm";
		}
		else
		{
			video_type = VIDEO_TYPE_MDA;
			video_mem_end	= 0xb2000;
			display_desc = "*MDA";
		}
	}
	else								/* If not, it is color. */
	{
		// 彩色显未：也要检查具体的不同模式
		video_mem_start = 0xb8000;
		video_port_reg	= 0x3d4;
		video_port_val	= 0x3d5;
		if ((ORIG_VIDEO_EGA_BX & 0xff) != 0x10)
		{
			video_type = VIDEO_TYPE_EGAC;
			video_mem_end = 0xbc000;
			display_desc = "EGAc";
		}
		else
		{
			video_type = VIDEO_TYPE_CGA;
			video_mem_end = 0xba000;
			display_desc = "*CGA";
		}
	}

	/* Let the user known what kind of display driver we are using */
	// 在屏幕右上角留4个字符，用于显示上面的display_desc中对应的字符串
	display_ptr = ((char *)video_mem_start) + video_size_row - 8;
	while (*display_desc)
	{
		*display_ptr++ = *display_desc++;			// 写字符
		display_ptr++;		// 属性不写，使用原来默认的值
	}
	
	/* Initialize the variables used for scrolling (mostly EGA/VGA)	*/
	
	origin	= video_mem_start;		// 显示的起始
	scr_end	= video_mem_start + video_num_lines * video_size_row;		// 显示的结束
	top	= 0;
	bottom	= video_num_lines;

	// 取当前的标志地址，然后保存到自己的内部x, y坐标中
	gotoxy(ORIG_X,ORIG_Y);

	// 开键盘的中断, 这里已经进行了键盘的初始化
	set_trap_gate(0x21,&keyboard_interrupt);
	outb_p(inb_p(0x21)&0xfd,0x21);

	// 控制8255 PB口，将相应位置1，禁止键，再重新打开。相当于是做了一个复位的操作
	a=inb_p(0x61);
	outb_p(a|0x80,0x61);
	outb(a,0x61);
}
/* from bsd-net-2: */

// 关闭蜂鸣器
void sysbeepstop(void)
{
	/* disable counter 2 */
	// 关掉定时器2，从而停止其工作，进而能够停止输出产生声音
	outb(inb_p(0x61)&0xFC, 0x61);
}

int beepcount = 0;		// 蜂鸣器响的次数，用于控制响多长时间

// 启动蜂鸣器响
static void sysbeep(void)
{
	// 控制8253定时器2

	/* enable counter 2 */
	outb_p(inb_p(0x61)|3, 0x61);

	// 定时器有连接蜂鸣器，配置输出PWM信号
	/* set command for counter 2, 2 byte write */
	outb_p(0xB6, 0x43);

	// 以750Hz频率输出，控制其发声
	/* send 0x637 for 750 HZ */
	outb_p(0x37, 0x42);
	outb(0x06, 0x42);
	/* 1/8 second */

	// 这里设置了时间
	// 在定时器中断中有调用do_timer，其会对beep_count--，实现响了一会儿就停止不响了
	// 即beepcount == 0时，调用sysbeepstop
	beepcount = HZ/8;	
}
